home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / vol_200 / 247_01 / fact.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1989-04-17  |  512 b   |  20 lines
  1. /*
  2.  *   Program to calculate factorials.
  3.  */
  4.  
  5. #include <stream.hpp>
  6. #include "big.hpp"   /* include MIRACL system */
  7.  
  8. miracl precision=100;
  9.  
  10. main()
  11. { /* calculate factorial of number */
  12.     Big nf=1;           /* declare "Big" variable nf */
  13.     int n;
  14.     cout << "factorial program\n";
  15.     cout << "input number n= \n";
  16.     cin >> n;
  17.     while (n>1) nf*=(n--);   /* nf=n!=n*(n-1)*(n-2)*....3*2*1  */
  18.     cout << "n!= \n" << nf << "\n";
  19. }
  20.